Listing 1: A BASIC program that solves the eccentric jailer problem. 

10 PRINT TAB( 1 8) "THE ECCENTRIC JAILER" 

20 PRINT TABU 51 "(Cl 1983 POPULAR COMPUTING" 

30 PRINT 

40 PRINT "CELL #1 WILL BE OPEN" 

50 FOR K = 2 TO 100: REM TRY ALL CELL NO'S FROM 2 TO 100 
60 S=0 

70 FOR J-1 TO K: REM TRY ALL POSSIBLE DIVISORS OF J 
80 IF K/J = INT(K|J| THEN S-S+1: REM COUNT THEM IN S 
90 NEXT J 

100 IF S/2 = INT(S/2) THEN 120: REM IS S ODD OR EVEN? 

110 PRINT "CELL H" K "WILL BE OPEN" 

120 NEXT K 


first case, we use powers 
lABfci the second, powers qOO. 
FoiH|k case, the coefficien»are 
equalfcfcqne of the numberltrom 0 
to 1 leMKhan the chosenjbase. 

Now,^|^t as we d<j not write 
base 10 nCfesfers in expanded form, 
for exaMk, ^1134 = 4 + (3 
x 10) + (1 x ^b).we do not write 
base 2 or binM^ Rn umbers in ex- 
panded form. IrfSpqd, we write 25 
in base 2 as lJ^Obie 1 on the ex- 
treme left it^eate»^46, the next 1 
indicates a*t ‘8, an$i|ne 1 on the 
right indicates a 1. exercise, 
you might. try writing® mi base 2 
form. -Figure out the eSaansion, 
the^tock it into a string ^^and 

So, the base 2 trick has legato. to 
an explanation of binary numbers! 

The Jailer Problem 

To recap from last month: an ec- 
centric jailer makes a complicated 
amnesty offer to his 100 inmates. 
Every second, he reverses the 
status of certain cell doors from 
open to closed or vice versa. After 
one second, he switches cells whose 
numbers are multiples of 1 (all of 
them are opened). After two sec- 
onds, cells whose numbers are 
multiples of 2 (even-numbered 
cells) are switched. After three sec- 
onds, he switches cells whose 
numbers are multiples of 3, and so 
on. He repeats this process for 100 
seconds. If a cell door is open after 
the last switch, the con in that cell 
goes free. 

Now, as we asked last month, 


which inmates will benefit from 
this amnesty offer? 

The key to the solution of the 
problem is the recognition that a 
cell is switched once for each 
number that divides evenly into 
the cell number. For example, cell 
number 6 will be switched at sec- 
onds 1 (open), 2 (closed), 3 (open), 
and 6 (closed)— these are the 
divisors of 6. If a cell number has 
an even number of divisors, then 
that cell will be closed when all the 
switching is over. Only cells whose 
numbers have an odd number of 
divisors will be open after all is said 
and done. 

The program in listing 1 finds 
and lists all the cells that will be 
open after the 100-second switch- 
ing process. Why not type it in and 
try it out before continuing? 

Did you notice the rather strik- 
ing pattern to the cells that are 
open? Next time I’ll offer an 
elementary mathematical explana- 
tion of why we get such an elegant 
result. 

If you have questions or ideas for 
recreational games, send them 
directly to me (enclose a stamped, 
self-addressed envelope if you wish 
a reply): 

Michael W. Ecker 
Contributing Editor 
Popular Computing 
129 Carol Dr. 

Clarks Summit, PA 18411 

Until next month, happy recrea- 
tional computing! □ 


DISCOUNT 

APPLE® BUSINESS 

•SOFTWARE •HARDWARE* 

• NOW IN OUR 3RD YEAR* 


•SAVE TO 50%*900+ PGMS-CALL* 
ACCOUNTING SOFTWARE 

LIST COST 

•B.RI. G/L-A/R-Pay-Time Actg (Ea) 395 289 

•Continental Software 

G/L-A/R-AfP-Payroll (Ea) 250 155 

ALL Four Modules 1000 605 

Home Accountant 75 47 

•FREDERICK E. DESG & ASSOC. 

CASH ACTG. SYSTEM* (Beg. dBASE II) SB 

•Peachtree G/L-A/R-AfP-lNV-Pay (Ea) 400 229 

•Systems + /S.W. Dim. Accounting + H 
G/L-A/R-A/P-Inventory (Ea) 395 239' 

ALL Four Modules 1250 649 

—COMMUNICATIONS SOFTWARE 

•SE Software Data Capture 4.0/Videx 90 59 

•SW DataZ-Term Professional* 150 95 i 

ASCII Express Professional 130 85 

DATA BASE/FINANCIAL MOD. —I 

•Applied Software Versa Form 389 245 

•AshtonTate dBASE II (FuU ver.)* 700 409 I 

•DATABASE PACKAGE $PECIAL* 
dBASE li (Full ver.) + Quickcode 995 589 

• Fox/Geller dUTIL* 99 55 

Quickcode* 295 179 

dGRAPH* 295 179 

•Microsoft MultiPlan (Spec. DOS or CP/M) 275 175 

•Software Publishing pFS: File 140 89 

•Sorcim Supercalc* 295 179 

•Stoneware DB Master 229 142 

Utility Paks (Ea) 99 62 

•Visicorp Visicaic 250 165 

UTILITY SOFTWARE 

•Microsoft TASC Compiler 175 115 

•Nibbles-Away II (Copy pgm) 70 55 

•Sensible Super Disk Copy III 30 22 

WORDPROCESSING SOFTWARE 

•Artsci Magic Window II (40/80) 150 93 

•Kensington Format il 250 159 

•UK Letterperfect w/mail-merge 150 95 

•Muse Supertext Professional 99 85 

•Sierra On-Line Screenwriter II 130 79 

•Silicon Valley Word Handler 199 129 

•SofSys Executive Secretary 250 157 

HARDWARE SPECIALS 

•Corona 5mB Hard Disk 2195 1839 

•D.C. Hayes Micromodem H 379 259 

Smartmodem 1200 699 509 

•Kensington SYSTEM SAVER Fan 90 65 

•MICRO-SCI A2 35T DISK DRIVE 479 289 

• Microsoft 16K RAMCARD 195 69 

Premium System 695 469 

•Practical Peripherals MB It (32K) 295 209 

•Rana Elite I Disk Drive 449 279 

•Videx Videoterm w/Soft-Switch 380 239 

Keyboard Enhancer J[ 149 105 


CP/M® PACKAGE SPECIALS— 

• NEW! ADV. LOGIC SYSTEMS • 

CP/M CARD w/New CP/M ® 3.0 
•84K Mem. • C BASIC • Auto Wordstar Install • 
SMARTERM 1180 col. w/lnv. & HULo video 

• PKG. SPECIAL $429»$AVE $149 • 

• PER. COMPUTER PRODUCTS* 

APPUCARD (6 mHz) w/CPIM‘64K-70 col. video 
Plus MICROPRO WORDSTAR 

SPECIAL $489 • SAVE $401* 


• ORDER DESK* 

DER (7:30AM -4PM M-F) — CALL... 

( 213 ) 823 - 0767 * 

PHONE ORDERS OVER S300 DEDUCT $3 
•TECHNICAL HOTLINE: (213) 306-3642* 

•7:30-SAM M-F»Consultatlon available* 


TERMS: MAIL ORDER ONLY. Prices/Terms subject to 
change w/o notice • Some Items-limited supply. Mail 
Orders under $100— Add $10. All Sales Final. 
PAYMENT: Cashier's Ck/MO/Bank Transfers/Person- 
al cks-Allow up to 20 days-CA: Add 6% Tax. (LA: 
6’/2%l • No COD or Terms - C.W.O. only. 

SHIPPING: UNDER $750-Add 2% (min $6) UPS Sur. 
Over $750 FREE UPS SURFACE! 
Postal/Foreign Add $25 + Postage 
MASTERCARD/VISA: Add 2% (Min. $200 charge) 


®CP/M-TM Digital Research ®Apple-TM Apple 
* Pgm requires CP/M® POC06 


• FREDERICK E. DEEG* 
and Associates 

13234-A FIJI WAY 
MARINA DEL REY, CA 90291 



